home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 March / CHIP Mart 1997.iso / SurfCam / SURFCAM.Z / DLG4G17.M3 < prev    next >
Encoding:
Text File  |  1996-04-01  |  4.6 KB  |  158 lines
  1. name Deckel Dialog 4 Plane G17
  2.  
  3. % >4
  4. b >4
  5. Q 00
  6. N >5
  7. G >2
  8. F >3.1
  9. f >3.1 F
  10. S +->4
  11. X +->3.>4
  12. x +->3.>4 X
  13. Y +->3.>4
  14. y +->3.>4 Y
  15. o +->3.>4 mult -1
  16. q +->3.>4 mult -1
  17. a +->3.>4
  18. z +->3.>4 Z
  19. g >2
  20. r >3.>4
  21. u +->3.>3 add -2
  22. Z +->3.>4
  23. I +->3.>4
  24. J +->3.>4
  25. K +->3.>4
  26. B +->3.>4
  27. T >2
  28. M >2
  29. W 00
  30. O 00
  31.  
  32. ModalLetters X Y Z F                  # List of letters that are modal    
  33.  
  34. ModalGs                               # List of g codes that are modal    
  35.  
  36. Sequence#s N 0 1 1                    # Char, freq, incr & start          
  37. First#? N                             # Y or N  'Output 1st sequence no.  
  38. Last#? N                              # Y or N  'Output last sequence no. 
  39.  
  40. HCode X                               # X or X U  'Horizontal char.       
  41. VCode Y                               # Y or Y V  'Vertical char.         
  42. Dcode Z                               # Depth char.                       
  43. FeedCode F                            # Feed rate char.                   
  44.  
  45. Comment ( )                           # Begin End comment char.           
  46.  
  47. Spindle 3 4 5                         # Cw, ccw & stop m codes            
  48. Coolant 8 9 8                         # On, Off & Mist m codes            
  49. DComp 41 42 40                        # Left, Right & Cancel m codes      
  50. LComp 43 49                           # On & Off codes                    
  51. Rapid G0                            # Rapid positioning word            
  52.  
  53. Spaces? Y                             # Y or N  'Spaces between words     
  54. Incremental? N                        # Y or N  'Inc or abs output        
  55. CtrIncremental? Y                     # Y or N  'Inc or abs I & J         
  56. ByQuadrants? N                        # Y or N  'Break arcs at quadrants  
  57.  
  58. Inc/Abs G 91 90                       # Inc & Abs char. & values          
  59. Helical? N
  60.  
  61. UppercaseComments? Y                  # Y or N 'Require uppercase comments
  62.  
  63. Drill 2                               # Drilling canned/manual cycle      
  64. N[Block] G0 x[H] z[Rplane] y[V]
  65. N[BLOCK] G81 S[Speed] f[Frate] o[Depth] u[Rplane]
  66. end
  67.  
  68. Peck 2                                # Pecking canned/manual cycle       
  69. N[Block] G0 x[H] z[Rplane] y[V]
  70. N[BLOCK] G83 S[Speed] f[Frate] o[Depth] q[VBite] a[-1] z[-0.01] u[Rplane]
  71. end
  72.  
  73. Tap 2                                 # Tapping canned/manual cycle       
  74. N[Block] G0 x[H] z[Rplane] y[v]
  75. N[BLOCK] G84 S[Speed] f[Frate] o[Depth] u[Rplane]
  76. end
  77.  
  78. Ream 2                                # Reaming canned/manual cycle       
  79. N[Block] G0 x[H] z[Rplane] y[v]
  80. N[BLOCK] G85 S[Speed] f[Frate] o[Depth] u[Rplane]
  81. end
  82.  
  83. Bore 2                                # Boring canned/manual cycle        
  84. N[Block] G0 x[H] z[Rplane] y[V]
  85. N[BLOCK] G82 S[Speed] f[Frate] o[Depth] q[VBite] a1 u[Rplane]
  86. end
  87.  
  88. Back 2                                # Back boring canned/manual cycle   
  89. N[Block] G0 x[H] z[Rplane] y[V]
  90. N[BLOCK] G86 S[Speed] f[Frate] o[Depth] u[Rplane]
  91. end
  92.  
  93. Cancel                                # Cancel a canned/manual cycle      
  94. N[Block] G80
  95. end
  96.  
  97. StartCode                             # Start of the program              
  98. %[Program#]
  99. b[Program#] Q0
  100. End
  101.  
  102. 1stToolChange                         # First tool change                 
  103. N[Block] G17 T[Tool]
  104. N[Block] G0 X[H] Y[V] S[Speed] f[FRate] M[Cool]
  105. N[Block] G0 Z[D]
  106. End
  107.  
  108. Infeed                                # Enable cutter comp                
  109.    N[Block] G1 Z[D] F[Plunge]
  110. N[Block] G[Side] X[H] Y[V] F[FRate]
  111. end
  112.  
  113. Outfeed                               # Disable cutter comp               
  114. N[Block] G40
  115. N[Block] G1 X[H] Y[V]
  116. end
  117.  
  118. ToolChange                            # Secondary tool changes            
  119. N[Block] G0 Z[ToolD] M9
  120. N[Block] T[Tool]
  121. N[Block] G0 X[H] Y[V] S[Speed] f[FRate] M[Cool]
  122. N[Block] G0 Z[D]
  123. End
  124.  
  125. EndCode                               # End of the program                
  126. N[Block] G0 Z[ToolD] M9
  127. N[Block] M30
  128. W0
  129. O0
  130. End
  131.  
  132. LineCode                              # Linear move                       
  133. N[Block] G1 X[H] Y[V] Z[D]
  134. end
  135.  
  136. RapidCode                             # Rapid move                        
  137. N[Block] G0 X[H] Y[V] Z[D]
  138. end
  139.  
  140. CwCode                                # CW circular move                  
  141. N[Block] G2 F[FRate] X[H] Y[V] I[IVal] J[JVal]
  142. end
  143.  
  144. CcwCode                               # CCW circular move                 
  145. N[Block] G3 F[FRate] X[H] Y[V] I[IVal] J[JVal]
  146. end
  147.  
  148. Replace "g" with "G"
  149. Replace "r" with "F"
  150. Replace "o" with "Z"
  151. Replace "q" with "Z"
  152. Replace "a" with "Z"
  153. Replace "u" with "Z"
  154. Replace "b" with "(&%"
  155. Replace "Q" with "/000000)"
  156. Replace "W" with "?"
  157. Replace "O" with "0000"
  158.